home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 6 / PC World Interactive 6.iso / online / twsk21c.EXE / BYE.CMD next >
OS/2 REXX Batch file  |  1995-06-14  |  930b  |  36 lines

  1. #
  2. #  Trumpet Winsock 2.1 Bye.cmd
  3. #
  4. #  Copyright (C) 1994,1995 Peter R. Tattam & 
  5. #  Trumpet Software International Pty Ltd (TSI)
  6. #  All rights reserved.
  7. #
  8. #  Unless TSI has given prior written consent to such use, 
  9. #  no permission is granted to distribute or otherwise make available 
  10. #  to the public modified versions of this script for commercial purposes.  
  11. #  Any permitted distribution of modified versions of the script must
  12. #  retain the copyright notice at the start of this file and must clearly 
  13. #  identify those parts of the file which have been modified.
  14. #
  15. #
  16. #  Set %which to 1 for normal DTR hang up or 
  17. #                2 for ATH0 style hangup
  18. #
  19. %which = 2
  20. status "Disconnecting modem..."
  21. if %which = 1
  22.   set dtr off
  23.   sleep 1
  24.   set dtr on
  25. end
  26. if %which = 2
  27.   sleep 2
  28.   output +++
  29.   input 5 OK\n
  30.   output ath0\r
  31.   input 5 OK\n
  32. end
  33. status "Modem has been disconnected."
  34. sleep 1
  35.  
  36.